2007-03-01 Lennart Borgman <lennart.borgman.073@student.lu.se>

* replace.el (perform-replace): Propertize message.

diff --git a/lisp/replace.el b/lisp/replace.el
index 20f38aec32fb083dec38938c7f28a6305ca788d3..5b970681ea73f77e4369872c324f4e3292d39044 100644 (file)
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -1423,8 +1423,10 @@ make, or the user didn't cancel the call."
 
        (message
         (if query-flag
-            (substitute-command-keys
-             "Query replacing %s with %s: (\\<query-replace-map>\\[help] for help) "))))
+            (apply 'propertize
+                   (substitute-command-keys
+                    "Query replacing %s with %s: (\\<query-replace-map>\\[help] for help) ")
+                   minibuffer-prompt-properties))))
 
     ;; If region is active, in Transient Mark mode, operate on region.
     (when start